home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 2: Applications / Linux Cubed Series 2 - Applications.iso / editors / emacs / xemacs / xemacs-1.006 / xemacs-1 / lib / xemacs-19.13 / lisp / hyperbole / hmoccur.elc < prev    next >
Emacs Compiled Lisp  |  1995-08-29  |  3.1 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was processed as: Emacs Compiled Lisp (other/emacsCompiledLisp).
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
1% dexvert Emacs Compiled Lisp (other/emacsCompiledLisp) magic Unsupported
1% dexvert Combustion 2 Particle Library (other/combustion2ParticleLibrary) ext Unsupported
100% file Emacs/XEmacs v19 byte-compiled Lisp data default
99% file data default
100% TrID Emacs/XEmacs byte-compiled Lisp (generic) default
100% xdgMime text/x-emacs-lisp default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 63 74 68 6f 6d 70 40 |piled by| cthomp@|
|00000020| 77 69 6c 6c 6f 77 2e 63 | 73 2e 75 69 75 63 2e 65 |willow.c|s.uiuc.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 41 75 67 20 32 39 |du on Tu|e Aug 29|
|00000040| 20 31 34 3a 35 31 3a 35 | 39 20 31 39 39 35 0a 3b | 14:51:5|9 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 65 78 |;; from |file /ex|
|00000060| 70 6f 72 74 2f 77 69 6c | 6c 6f 77 33 2f 78 65 6d |port/wil|low3/xem|
|00000070| 61 63 73 2d 31 39 2e 31 | 33 2d 72 65 6c 65 61 73 |acs-19.1|3-releas|
|00000080| 65 2f 65 64 69 74 6f 72 | 2f 6c 69 73 70 2f 68 79 |e/editor|/lisp/hy|
|00000090| 70 65 72 62 6f 6c 65 2f | 68 6d 6f 63 63 75 72 2e |perbole/|hmoccur.|
|000000a0| 65 6c 0a 3b 3b 3b 20 65 | 6d 61 63 73 20 76 65 72 |el.;;; e|macs ver|
|000000b0| 73 69 6f 6e 20 31 39 2e | 31 33 20 58 45 6d 61 63 |sion 19.|13 XEmac|
|000000c0| 73 20 4c 75 63 69 64 2e | 0a 3b 3b 3b 20 62 79 74 |s Lucid.|.;;; byt|
|000000d0| 65 63 6f 6d 70 20 76 65 | 72 73 69 6f 6e 20 32 2e |ecomp ve|rsion 2.|
|000000e0| 32 35 3b 20 31 2d 53 65 | 70 2d 39 34 2e 0a 3b 3b |25; 1-Se|p-94..;;|
|000000f0| 3b 20 6f 70 74 69 6d 69 | 7a 61 74 69 6f 6e 20 69 |; optimi|zation i|
|00000100| 73 20 6f 6e 2e 0a 3b 3b | 3b 20 74 68 69 73 20 66 |s on..;;|; this f|
|00000110| 69 6c 65 20 75 73 65 73 | 20 6f 70 63 6f 64 65 73 |ile uses| opcodes|
|00000120| 20 77 68 69 63 68 20 64 | 6f 20 6e 6f 74 20 65 78 | which d|o not ex|
|00000130| 69 73 74 20 69 6e 20 45 | 6d 61 63 73 20 31 38 2e |ist in E|macs 18.|
|00000140| 0a 0a 28 69 66 20 28 61 | 6e 64 20 28 62 6f 75 6e |..(if (a|nd (boun|
|00000150| 64 70 20 27 65 6d 61 63 | 73 2d 76 65 72 73 69 6f |dp 'emac|s-versio|
|00000160| 6e 29 0a 09 20 28 6f 72 | 20 28 61 6e 64 20 28 62 |n).. (or| (and (b|
|00000170| 6f 75 6e 64 70 20 27 65 | 70 6f 63 68 3a 3a 76 65 |oundp 'e|poch::ve|
|00000180| 72 73 69 6f 6e 29 20 65 | 70 6f 63 68 3a 3a 76 65 |rsion) e|poch::ve|
|00000190| 72 73 69 6f 6e 29 0a 09 | 20 20 20 20 20 28 73 74 |rsion)..| (st|
|000001a0| 72 69 6e 67 2d 6c 65 73 | 73 70 20 65 6d 61 63 73 |ring-les|sp emacs|
|000001b0| 2d 76 65 72 73 69 6f 6e | 20 22 31 39 22 29 29 29 |-version| "19")))|
|000001c0| 0a 20 20 20 20 28 65 72 | 72 6f 72 20 22 54 68 69 |. (er|ror "Thi|
|000001d0| 73 20 66 69 6c 65 20 77 | 61 73 20 63 6f 6d 70 69 |s file w|as compi|
|000001e0| 6c 65 64 20 66 6f 72 20 | 45 6d 61 63 73 20 31 39 |led for |Emacs 19|
|000001f0| 2e 22 29 29 0a 0a 28 64 | 65 66 63 6f 6e 73 74 20 |."))..(d|efconst |
|00000200| 6d 6f 63 63 75 72 2d 73 | 6f 75 72 63 65 2d 70 72 |moccur-s|ource-pr|
|00000210| 65 66 69 78 20 22 40 6c | 6f 63 3e 20 22 20 22 5c |efix "@l|oc> " "\|
|00000220| 0a 50 72 65 66 69 78 20 | 66 6f 72 20 6c 69 6e 65 |.Prefix |for line|
|00000230| 73 20 69 6e 64 69 63 61 | 74 69 6e 67 20 73 6f 75 |s indica|ting sou|
|00000240| 72 63 65 20 6f 66 20 6d | 61 74 63 68 65 73 2e 22 |rce of m|atches."|
|00000250| 29 0a 28 66 73 65 74 20 | 27 6d 6f 63 63 75 72 20 |).(fset |'moccur |
|00000260| 23 5b 28 72 65 67 65 78 | 70 20 26 6f 70 74 69 6f |#[(regex|p &optio|
|00000270| 6e 61 6c 20 66 69 6c 65 | 2d 72 65 67 65 78 70 20 |nal file|-regexp |
|00000280| 6e 6f 2d 66 6f 6c 64 2d | 73 65 61 72 63 68 29 20 |no-fold-|search) |
|00000290| 22 08 c1 9a ab 82 c2 10 | 08 ab 90 c3 c4 c5 08 21 |".......|.......!|
|000002a0| ae 81 c6 21 c7 c8 08 21 | 23 aa 82 c9 20 1e 5c 6e |...!...!|#... .\n|
|000002b0| cb cc 21 1e 0d ce 1e 0f | d0 1e 11 0e 0d 71 88 c2 |..!.....|.....q..|
|000002c0| 16 12 7e 88 d3 20 88 d4 | 0e 15 d6 b1 03 88 c2 89 |..~.. ..|........|
|000002d0| 89 1e 17 1e 18 1e 19 0e | 5c 6e 83 fb 00 0e 5c 6e |........|\n....\n|
|000002e0| 40 89 16 19 3b ad 82 0e | 19 89 16 18 ad 85 da 0e |@...;...|........|
|000002f0| 18 21 3f 16 17 0e 5c 6e | 41 16 5c 6e 0e 18 ab 88 |.!?...\n|A.\n....|
|00000300| db 0e 18 21 16 19 aa 86 | dc 0e 19 21 16 18 0e 18 |...!....|...!....|
|00000310| ab 49 0e 19 ab 45 0e 19 | 71 88 0e 1d 3f 1e 1e 8a |.I...E..|q...?...|
|00000320| 65 62 88 d0 16 11 df 0e | 15 c2 d0 23 ab c9 0e 0f |eb......|...#....|
|00000330| e0 5c 5c 16 0f e1 65 60 | 5c 22 1e 5c 22 e3 e4 0e |.\\...e`|\".\"...|
|00000340| 5c 22 5c 22 1e 25 0e 0d | 71 88 0e 11 ab 8b 0e 26 |\"\".%..|q......&|
|00000350| 0e 18 e7 b1 03 88 c2 16 | 11 0e 25 63 88 0e 19 71 |........|..%c...q|
|00000360| 88 e8 76 88 ce 79 88 60 | 1e 29 c2 7f 88 ea 0e 0d |..v..y.`|.)......|
|00000370| 0e 29 60 23 88 29 e0 79 | 88 2a aa 2f 2a 8a 0e 0d |.)`#.).y|.*./*...|
|00000380| 71 88 0e 11 ac 83 eb 63 | 88 0e 17 ab 85 ec 0e 19 |q......c|........|
|00000390| 21 88 29 82 45 00 2b 0e | 0f ce 56 ab ab 0e 0d 71 |!.).E.+.|..V....q|
|000003a0| 88 ed 20 88 ee ef 21 ab | 8e e0 62 88 f0 f1 c2 d0 |.. ...!.|..b.....|
|000003b0| 23 ab 84 ef e0 21 88 65 | 62 88 f2 0e 0d 21 88 f3 |#....!.e|b....!..|
|000003c0| f4 0e 0f 5c 22 88 d0 aa | 85 f3 f5 21 88 c2 2c 87 |...\"...|...!..,.|
|000003d0| 22 20 5b 66 69 6c 65 2d | 72 65 67 65 78 70 20 22 |" [file-|regexp "|
|000003e0| 22 20 6e 69 6c 20 64 69 | 72 65 63 74 6f 72 79 2d |" nil di|rectory-|
|000003f0| 66 69 6c 65 73 20 65 78 | 70 61 6e 64 2d 66 69 6c |files ex|pand-fil|
|00000400| 65 2d 6e 61 6d 65 20 66 | 69 6c 65 2d 6e 61 6d 65 |e-name f|ile-name|
|00000410| 2d 64 69 72 65 63 74 6f | 72 79 20 22 2e 22 20 66 |-directo|ry "." f|
|00000420| 75 6c 6c 20 66 69 6c 65 | 2d 6e 61 6d 65 2d 6e 6f |ull file|-name-no|
|00000430| 6e 64 69 72 65 63 74 6f | 72 79 20 62 75 66 66 65 |ndirecto|ry buffe|
|00000440| 72 2d 6c 69 73 74 20 62 | 75 66 66 65 72 73 20 67 |r-list b|uffers g|
|00000450| 65 74 2d 62 75 66 66 65 | 72 2d 63 72 65 61 74 65 |et-buffe|r-create|
|00000460| 20 22 2a 4d 6f 63 63 75 | 72 2a 22 20 6f 63 63 62 | "*Moccu|r*" occb|
|00000470| 75 66 20 30 20 6d 61 74 | 63 68 65 73 20 74 20 66 |uf 0 mat|ches t f|
|00000480| 69 72 73 74 6d 61 74 63 | 68 20 62 75 66 66 65 72 |irstmatc|h buffer|
|00000490| 2d 72 65 61 64 2d 6f 6e | 6c 79 20 65 72 61 73 65 |-read-on|ly erase|
|000004a0| 2d 62 75 66 66 65 72 20 | 22 4c 69 6e 65 73 20 6d |-buffer |"Lines m|
|000004b0| 61 74 63 68 69 6e 67 20 | 27 22 20 72 65 67 65 78 |atching |'" regex|
|000004c0| 70 20 22 27 3a 5c 6e 5c | 6e 22 20 6b 69 6c 6c 2d |p "':\n\|n" kill-|
|000004d0| 62 75 66 20 63 75 72 72 | 66 69 6c 65 20 63 75 72 |buf curr|file cur|
|000004e0| 72 62 75 66 20 67 65 74 | 2d 66 69 6c 65 2d 62 75 |rbuf get|-file-bu|
|000004f0| 66 66 65 72 20 66 69 6e | 64 2d 66 69 6c 65 2d 6e |ffer fin|d-file-n|
|00000500| 6f 73 65 6c 65 63 74 20 | 62 75 66 66 65 72 2d 66 |oselect |buffer-f|
|00000510| 69 6c 65 2d 6e 61 6d 65 | 20 6e 6f 2d 66 6f 6c 64 |ile-name| no-fold|
|00000520| 2d 73 65 61 72 63 68 20 | 63 61 73 65 2d 66 6f 6c |-search |case-fol|
|00000530| 64 2d 73 65 61 72 63 68 | 20 72 65 2d 73 65 61 72 |d-search| re-sear|
|00000540| 63 68 2d 66 6f 72 77 61 | 72 64 20 31 20 63 6f 75 |ch-forwa|rd 1 cou|
|00000550| 6e 74 2d 6c 69 6e 65 73 | 20 6c 69 6e 65 6e 75 6d |nt-lines| linenum|
|00000560| 20 66 6f 72 6d 61 74 20 | 22 5c 6e 25 34 64 3a 22 | format |"\n%4d:"|
|00000570| 20 74 61 67 20 6d 6f 63 | 63 75 72 2d 73 6f 75 72 | tag moc|cur-sour|
|00000580| 63 65 2d 70 72 65 66 69 | 78 20 22 5c 6e 22 20 2d |ce-prefi|x "\n" -|
|00000590| 31 20 62 65 67 20 61 70 | 70 65 6e 64 2d 74 6f 2d |1 beg ap|pend-to-|
|000005a0| 62 75 66 66 65 72 20 22 | 5c 6e 5c 6e 22 20 6b 69 |buffer "|\n\n" ki|
|000005b0| 6c 6c 2d 62 75 66 66 65 | 72 20 6d 6f 63 63 75 72 |ll-buffe|r moccur|
|000005c0| 2d 6d 6f 64 65 20 66 62 | 6f 75 6e 64 70 20 6f 75 |-mode fb|oundp ou|
|000005d0| 74 6c 69 6e 65 2d 6d 69 | 6e 6f 72 2d 6d 6f 64 65 |tline-mi|nor-mode|
|000005e0| 20 73 65 61 72 63 68 2d | 66 6f 72 77 61 72 64 20 | search-|forward |
|000005f0| 22 0d 22 20 70 6f 70 2d | 74 6f 2d 62 75 66 66 65 |"." pop-|to-buffe|
|00000600| 72 20 6d 65 73 73 61 67 | 65 20 22 25 64 20 6d 61 |r messag|e "%d ma|
|00000610| 74 63 68 65 73 2e 22 20 | 22 4e 6f 20 6d 61 74 63 |tches." |"No matc|
|00000620| 68 65 73 2e 22 5d 20 36 | 20 22 5c 0a 53 68 6f 77 |hes."] 6| "\.Show|
|00000630| 20 61 6c 6c 20 6c 69 6e | 65 73 20 6f 66 20 61 6c | all lin|es of al|
|00000640| 6c 20 62 75 66 66 65 72 | 73 20 63 6f 6e 74 61 69 |l buffer|s contai|
|00000650| 6e 69 6e 67 20 61 20 6d | 61 74 63 68 20 66 6f 72 |ning a m|atch for|
|00000660| 20 52 45 47 45 58 50 2e | 0a 57 69 74 68 20 6f 70 | REGEXP.|.With op|
|00000670| 74 69 6f 6e 61 6c 20 46 | 49 4c 45 2d 52 45 47 45 |tional F|ILE-REGE|
|00000680| 58 50 2c 20 61 20 70 61 | 74 74 65 72 6e 20 6d 61 |XP, a pa|ttern ma|
|00000690| 74 63 68 69 6e 67 20 74 | 6f 20 66 69 6c 65 73 20 |tching t|o files |
|000006a0| 69 6e 20 61 20 73 69 6e | 67 6c 65 0a 64 69 72 65 |in a sin|gle.dire|
|000006b0| 63 74 6f 72 79 2c 20 73 | 65 61 72 63 68 20 6d 61 |ctory, s|earch ma|
|000006c0| 74 63 68 69 6e 67 20 66 | 69 6c 65 73 20 72 61 74 |tching f|iles rat|
|000006d0| 68 65 72 20 74 68 61 6e | 20 63 75 72 72 65 6e 74 |her than| current|
|000006e0| 20 62 75 66 66 65 72 73 | 2e 0a 54 68 65 20 6c 69 | buffers|..The li|
|000006f0| 6e 65 73 20 61 72 65 20 | 73 68 6f 77 6e 20 69 6e |nes are |shown in|
|00000700| 20 61 20 62 75 66 66 65 | 72 20 6e 61 6d 65 64 20 | a buffe|r named |
|00000710| 2a 4d 6f 63 63 75 72 2a | 20 77 68 69 63 68 20 73 |*Moccur*| which s|
|00000720| 65 72 76 65 73 20 61 73 | 20 61 20 6d 65 6e 75 20 |erves as| a menu |
|00000730| 74 6f 0a 66 69 6e 64 20 | 61 6e 79 20 6f 66 20 74 |to.find |any of t|
|00000740| 68 65 20 6f 63 63 75 72 | 72 65 6e 63 65 73 20 69 |he occur|rences i|
|00000750| 6e 20 74 68 69 73 20 62 | 75 66 66 65 72 2e 0a 5c |n this b|uffer..\|
|00000760| 5c 5b 64 65 73 63 72 69 | 62 65 2d 6d 6f 64 65 5d |\[descri|be-mode]|
|00000770| 20 69 6e 20 74 68 61 74 | 20 62 75 66 66 65 72 20 | in that| buffer |
|00000780| 65 78 70 6c 61 69 6e 73 | 20 68 6f 77 2e 22 20 22 |explains| how." "|
|00000790| 73 52 65 67 65 78 70 20 | 74 6f 20 66 69 6e 64 20 |sRegexp |to find |
|000007a0| 6f 63 63 75 72 72 65 6e | 63 65 73 20 6f 66 3a 20 |occurren|ces of: |
|000007b0| 5c 6e 73 46 69 6c 65 73 | 20 74 6f 20 73 65 61 72 |\nsFiles| to sear|
|000007c0| 63 68 20 28 64 65 66 61 | 75 6c 74 20 63 75 72 72 |ch (defa|ult curr|
|000007d0| 65 6e 74 20 66 69 6c 65 | 20 62 75 66 66 65 72 73 |ent file| buffers|
|000007e0| 29 3a 20 22 5d 29 0a 28 | 66 73 65 74 20 27 6d 6f |): "]).(|fset 'mo|
|000007f0| 63 63 75 72 2d 74 6f 20 | 23 5b 6e 69 6c 20 22 08 |ccur-to |#[nil ".|
|00000800| c1 3d ac 84 c2 c3 21 87 | c4 89 89 89 1d 1e 06 1e |.=....!.|........|
|00000810| 07 1e 08 8a c9 79 88 60 | 16 08 c4 7f 88 0e 08 60 |.....y.`|.......`|
|00000820| 7b 16 07 ca cb 0e 07 5c | 22 ab b2 cc 0e 07 c9 89 |{......\|".......|
|00000830| 95 4f 21 16 06 cd ce 0e | 0f d0 51 c4 d1 23 ab 97 |.O!.....|..Q..#..|
|00000840| d2 94 d2 95 7b 16 07 d3 | 0e 07 21 89 15 ac 92 d4 |....{...|..!.....|
|00000850| d5 0e 07 5c 22 88 aa 8a | c2 d6 21 88 aa 84 c2 d7 |...\"...|..!.....|
|00000860| 21 88 29 0e 06 ad 93 0d | ad 90 d4 d8 0e 07 0e 06 |!.).....|........|
|00000870| 23 88 d9 0d 21 88 da 0e | 06 21 2c 87 22 20 5b 6d |#...!...|.!,." [m|
|00000880| 61 6a 6f 72 2d 6d 6f 64 | 65 20 6d 6f 63 63 75 72 |ajor-mod|e moccur|
|00000890| 2d 6d 6f 64 65 20 65 72 | 72 6f 72 20 22 27 6d 6f |-mode er|ror "'mo|
|000008a0| 63 63 75 72 2d 74 6f 27 | 20 6d 75 73 74 20 62 65 |ccur-to'| must be|
|000008b0| 20 63 61 6c 6c 65 64 20 | 77 69 74 68 69 6e 20 61 | called |within a|
|000008c0| 20 6d 6f 63 63 75 72 20 | 62 75 66 66 65 72 2e 22 | moccur |buffer."|
|000008d0| 20 6e 69 6c 20 64 73 74 | 62 75 66 20 6c 69 6e 65 | nil dst|buf line|
|000008e0| 6e 6f 20 6c 69 6e 65 20 | 62 65 67 20 30 20 73 74 |no line |beg 0 st|
|000008f0| 72 69 6e 67 2d 6d 61 74 | 63 68 20 22 5e 5b 20 5d |ring-mat|ch "^[ ]|
|00000900| 2a 5b 30 2d 39 5d 2b 3a | 22 20 73 74 72 69 6e 67 |*[0-9]+:|" string|
|00000910| 2d 74 6f 2d 69 6e 74 20 | 72 65 2d 73 65 61 72 63 |-to-int |re-searc|
|00000920| 68 2d 62 61 63 6b 77 61 | 72 64 20 22 5e 22 20 6d |h-backwa|rd "^" m|
|00000930| 6f 63 63 75 72 2d 73 6f | 75 72 63 65 2d 70 72 65 |occur-so|urce-pre|
|00000940| 66 69 78 20 22 5c 22 3f | 5c 5c 28 5b 5e 5c 22 20 |fix "\"?|\\([^\" |
|00000950| 5c 6e 5d 2b 5c 5c 29 5c | 22 3f 22 20 74 20 31 20 |\n]+\\)\|"?" t 1 |
|00000960| 66 69 6e 64 2d 66 69 6c | 65 2d 6e 6f 73 65 6c 65 |find-fil|e-nosele|
|00000970| 63 74 20 6d 65 73 73 61 | 67 65 20 22 6d 6f 63 63 |ct messa|ge "mocc|
|00000980| 75 72 2d 74 6f 3a 20 66 | 69 6c 65 20 27 25 73 27 |ur-to: f|ile '%s'|
|00000990| 20 69 73 20 6e 6f 74 20 | 72 65 61 64 61 62 6c 65 | is not |readable|
|000009a0| 22 20 22 4e 6f 20 6d 6f | 63 63 75 72 20 68 65 61 |" "No mo|ccur hea|
|000009b0| 64 65 72 20 6c 69 6e 65 | 20 66 6f 72 20 66 69 6c |der line| for fil|
|000009c0| 65 2e 22 20 22 4e 6f 74 | 20 61 6e 20 6d 6f 63 63 |e." "Not| an mocc|
|000009d0| 75 72 20 6f 63 63 75 72 | 72 65 6e 63 65 20 6c 69 |ur occur|rence li|
|000009e0| 6e 65 2e 22 20 22 53 65 | 6c 65 63 74 69 6f 6e 20 |ne." "Se|lection |
|000009f0| 3c 25 73 3e 20 6c 69 6e | 65 20 25 64 2e 22 20 70 |<%s> lin|e %d." p|
|00000a00| 6f 70 2d 74 6f 2d 62 75 | 66 66 65 72 20 67 6f 74 |op-to-bu|ffer got|
|00000a10| 6f 2d 6c 69 6e 65 5d 20 | 35 20 22 5c 0a 47 6f 20 |o-line] |5 "\.Go |
|00000a20| 74 6f 20 74 68 65 20 6c | 69 6e 65 20 77 68 65 72 |to the l|ine wher|
|00000a30| 65 20 74 68 69 73 20 6f | 63 63 75 72 72 65 6e 63 |e this o|ccurrenc|
|00000a40| 65 20 77 61 73 20 66 6f | 75 6e 64 2e 22 20 6e 69 |e was fo|und." ni|
|00000a50| 6c 5d 29 0a 28 66 73 65 | 74 20 27 6d 6f 63 63 75 |l]).(fse|t 'moccu|
|00000a60| 72 2d 6d 6f 64 65 2d 67 | 6f 74 6f 2d 6f 63 63 75 |r-mode-g|oto-occu|
|00000a70| 72 72 65 6e 63 65 20 27 | 6d 6f 63 63 75 72 2d 74 |rrence '|moccur-t|
|00000a80| 6f 29 0a 28 66 73 65 74 | 20 27 6d 6f 63 63 75 72 |o).(fset| 'moccur|
|00000a90| 2d 6d 6f 64 65 20 23 5b | 6e 69 6c 20 22 c0 20 88 |-mode #[|nil ". .|
|00000aa0| c1 5c 6e 21 88 c3 14 c5 | 89 16 06 87 22 20 5b 6b |.\n!....|...." [k|
|00000ab0| 69 6c 6c 2d 61 6c 6c 2d | 6c 6f 63 61 6c 2d 76 61 |ill-all-|local-va|
|00000ac0| 72 69 61 62 6c 65 73 20 | 75 73 65 2d 6c 6f 63 61 |riables |use-loca|
|00000ad0| 6c 2d 6d 61 70 20 6d 6f | 63 63 75 72 2d 6d 6f 64 |l-map mo|ccur-mod|
|00000ae0| 65 2d 6d 61 70 20 6d 6f | 63 63 75 72 2d 6d 6f 64 |e-map mo|ccur-mod|
|00000af0| 65 20 6d 61 6a 6f 72 2d | 6d 6f 64 65 20 22 4d 6f |e major-|mode "Mo|
|00000b00| 63 63 75 72 22 20 6d 6f | 64 65 2d 6e 61 6d 65 5d |ccur" mo|de-name]|
|00000b10| 20 32 20 22 5c 0a 4d 61 | 6a 6f 72 20 6d 6f 64 65 | 2 "\.Ma|jor mode|
|00000b20| 20 66 6f 72 20 6f 75 74 | 70 75 74 20 66 72 6f 6d | for out|put from|
|00000b30| 20 5c 5c 5b 6d 6f 63 63 | 75 72 5d 2e 0a 4d 6f 76 | \\[mocc|ur]..Mov|
|00000b40| 65 20 70 6f 69 6e 74 20 | 74 6f 20 6f 6e 65 20 6f |e point |to one o|
|00000b50| 66 20 74 68 65 20 6f 63 | 63 75 72 72 65 6e 63 65 |f the oc|currence|
|00000b60| 73 20 69 6e 20 74 68 69 | 73 20 62 75 66 66 65 72 |s in thi|s buffer|
|00000b70| 2c 0a 74 68 65 6e 20 75 | 73 65 20 5c 5c 5b 6d 6f |,.then u|se \\[mo|
|00000b80| 63 63 75 72 2d 74 6f 5d | 20 74 6f 20 67 6f 20 74 |ccur-to]| to go t|
|00000b90| 6f 20 74 68 65 20 73 61 | 6d 65 20 6f 63 63 75 72 |o the sa|me occur|
|00000ba0| 72 65 6e 63 65 0a 69 6e | 20 74 68 65 20 62 75 66 |rence.in| the buf|
|00000bb0| 66 65 72 20 74 68 61 74 | 20 74 68 65 20 6f 63 63 |fer that| the occ|
|00000bc0| 75 72 72 65 6e 63 20 77 | 61 73 20 66 6f 75 6e 64 |urrenc w|as found|
|00000bd0| 20 69 6e 2e 0a 5c 5c 7b | 6f 63 63 75 72 2d 6d 6f | in..\\{|occur-mo|
|00000be0| 64 65 2d 6d 61 70 7d 22 | 5d 29 0a 28 62 79 74 65 |de-map}"|]).(byte|
|00000bf0| 2d 63 6f 64 65 20 22 c0 | c1 21 ac 82 c2 11 09 ac |-code ".|.!......|
|00000c00| 95 c3 20 11 c4 09 c5 c6 | 23 88 c4 09 c7 c6 23 88 |.. .....|#.....#.|
|00000c10| c4 09 c8 c6 23 88 c9 ca | 21 87 22 20 5b 62 6f 75 |....#...|!." [bou|
|00000c20| 6e 64 70 20 6d 6f 63 63 | 75 72 2d 6d 6f 64 65 2d |ndp mocc|ur-mode-|
|00000c30| 6d 61 70 20 6e 69 6c 20 | 6d 61 6b 65 2d 73 70 61 |map nil |make-spa|
|00000c40| 72 73 65 2d 6b 65 79 6d | 61 70 20 64 65 66 69 6e |rse-keym|ap defin|
|00000c50| 65 2d 6b 65 79 20 22 03 | 03 22 20 6d 6f 63 63 75 |e-key ".|." moccu|
|00000c60| 72 2d 74 6f 20 22 20 22 | 20 22 0d 22 20 70 72 6f |r-to " "| "." pro|
|00000c70| 76 69 64 65 20 68 6d 6f | 63 63 75 72 5d 20 34 29 |vide hmo|ccur] 4)|
|00000c80| 0a | |. | |
+--------+-------------------------+-------------------------+--------+--------+